program ImageComp; uses Forms, umain in 'umain.pas' {MainForm}, unavi in 'unavi.pas' {fNavi}; {$R *.RES} begin Application.Initialize; Application.Title := 'Compare Demo'; Application.CreateForm(TMainForm, MainForm); Application.CreateForm(TfNavi, fNavi); Application.Run; end.